﻿<!-- #include file="mymin.asp" -->
<%
If Request.form("submit1") <> "" Then

	if len(Request.Form("wapUrl"))<3 then
		Call Error2("请输入网站地址！")
	end if

	if Request.Form("wapDay")<>"" then
		if isdate(Request.Form("wapDay"))=false then
			Call Error2("首页倒计时时间设置出错，格式为2008-8-8")
		end if
	end if
	'----------------------------------------------------------------
	'	生成wap.asp文件
	'----------------------------------------------------------------
	dim HU_Config,HU_File

	HU_File= "../../config/wap.asp"'生成wap.asp文件路径

	HU_Config="<"&"%"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapStyle="""&Request.Form("wapStyle")&""" '网站样式"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapTitle="""&forQuote(Request.Form("wapTitle"))&""" '网站名称"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapUrl="""&forQuote(Request.Form("wapUrl"))&""" '网站地址"
	HU_Config=HU_Config+chr(13)&chr(10)&"waplogo="""&forQuote(Request.Form("waplogo"))&""" '网站LOGO"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapConst="""&Request.Form("wapConst")&""" '网站排版"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapReport="""&Request.Form("wapReport")&""" '全站公告"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLogin="""&Request.Form("wapLogin")&""" '注册登录"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLogout="""&forQuote(Request.Form("wapLogout"))&""" '游客显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLogined="""&forQuote(Request.Form("wapLogined"))&""" '会员显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapAccess="""&Request.Form("wapAccess")&""" '会员独享"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapFavor="""&Request.Form("wapFavor")&""" '首页问候语"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLink="""&Request.Form("wapLink")&""" '首页链接"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapDiscuss="""&Request.Form("wapDiscuss")&""" '文章评论"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapHits="""&Request.Form("wapHits")&""" '文章点击率"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapGuest="""&Request.Form("wapGuest")&""" '留言显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapDay="""&Request.Form("wapDay")&""" '首页倒计时"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapDayName="""&forQuote(Request.Form("wapDayName"))&""" '倒计时项目名"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapword="""&forQuote(Request.Form("wapword"))&""" '敏感词过滤"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLastc="""&Request.Form("wapLastc")&""" '底部显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLast="""&forQuote(Request.Form("wapLast"))&""" '底部控制"
	HU_Config=HU_Config+chr(13)&chr(10)&"%"&">"
	Call savetofile(HU_Config,HU_File)
	Call buildCssByStyle(Request.Form("wapStyle"))
	Response.Write "<meta http-equiv=""refresh"" content=""1;url=index.asp?sid="&sid&"""><title></title></head><body><div class=""main320"">"
	Response.Write "成功设置！正在返回..."
else%>
<title>网站首要配置</title></head><body><div class="main400">
<form method="post" action="wap.asp">
<table>
<tr><td>网站样式:</td><td><select name="wapStyle">
<option value="3">wap2.0宽屏</option>
<option value="2" <% if wapStyle="2" then w "selected"%>>wap2.0窄版</option>
<option value="1" <% if wapStyle="1" then w "selected"%>>wap1.0</option>
</select></td></tr>
<tr><td>站点名称:</td><td><input name="wapTitle" type="text" value="<%=nowml(wapTitle)%>"/></td></tr>
<tr><td>网站地址:</td><td><input name="wapUrl" type="text" value="<%=nowml(wapUrl)%>"/></td></tr>
<tr><td>站点LOGO:</td><td><input name="waplogo" type="text" value="<%=nowml(waplogo)%>"/></td></tr>
<tr><td>网站排版:</td><td><select name="wapConst">
<option value="left">居左</option>
<option value="center" <% if wapConst="center" then w "selected"%>>居中</option>
<option value="right" <% if wapConst="right" then w "selected"%>>居右</option>
</select></td></tr>
<tr><td>全站公告:</td><td><select name="wapReport">
<option value="1">显示</option>
<option value="0" <% if wapReport="0" then w "selected"%>>不显示</option>
</select></td></tr>
<tr><td>注册登录:</td><td><select name="wapLogin">
<option value="1">显示</option>
<option value="0" <% if wapLogin="0" then w "selected"%>>不显示</option>
</select><font color="red">以下两项修改显示效果</font></td></tr>
<tr><td>游客显示:</td><td><input name="wapLogout" type="text" value="<%=nowml(wapLogout)%>" class="input"/></td></tr>
<tr><td>会员显示:</td><td><input name="wapLogined" type="text" value="<%=nowml(wapLogined)%>" class="input"/></td></tr>
<tr><td>会员独享:</td><td><select name="wapAccess">
<option value="0">默认功能</option>
<option value="1" <% if wapAccess="1" then w "selected"%>>文章阅读</option>
<option value="2" <% if wapAccess="2" then w "selected"%>>帖子阅读</option>
<option value="5" <% if wapAccess="5" then w "selected"%>>以上全部</option>
<option value="999" <% if wapAccess="999" then w "selected"%>>整个网站</option>
</select></td></tr>
<tr><td>首页问候语:</td><td><select name="wapFavor">
<option value="1">显示</option>
<option value="0" <% if wapFavor="0" then w "selected"%>>不显示</option>
</select></td></tr>
<tr><td>首页链接:</td><td><select name="wapLink">
<option value="1">显示</option>
<option value="0" <% if wapLink="0" then w "selected"%>>不显示</option>
</select></td></tr>
<tr><td>首页倒计时:</td><td><input name="wapDay" type="text" value="<%=wapDay%>"/></td></tr>
<tr><td>倒计时名称:</td><td><input name="wapDayName" type="text" value="<%=wapDayName%>"/></td></tr>
<tr><td>评论/群聊:</td><td><select name="wapDiscuss">
<option value="1">需登录</option>
<option value="0"<%if wapDiscuss=0 then w "selected"%>>不限制</option>
</select></td></tr>
<tr><td>文章点击率:</td><td><select name="wapHits">
<option value="1">显示</option>
<option value="0" <% if wapHits="0" then w "selected"%>>不显示</option>
</select></td></tr>
<tr><td>留言显示:</td><td><select name="wapGuest">
<option value="1">需审核</option>
<option value="0" <% if wapGuest="0" then w "selected"%>>不审核</option>
</select></td></tr>
<tr><td>敏感词过滤:</td><td><input name="wapword" type="text" value="<%=wapword%>" class="input"/></td></tr>
</table>
底部栏目内容:(支持<a href="../ubbcl.asp?sid=<%=sid%>">UBB</a>)
<select name="wapLastc">
<option value="1">全站显示</option>
<option value="0" <% if wapLastc="0" then w "selected"%>>首页不显示</option>
</select><br/>
<textarea name="wapLast" cols="45" rows="10"><%=nowml(wapLast)%></textarea><br/>
<input type="submit" value="保存配置"/>
<input type="hidden" name="submit1" value="1"/>
<input type="hidden" name="sid" value="<%=sid%>"/>
</form>
温馨提示:网站排版仅对wap1.0有效<br/>
<%end if%><br/>
<a href="index.asp?sid=<%=sid%>">[网站配置]</a><%call Last2%>